(appt-disp-window): Call raise-frame.

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index 2012d8c525efd0f9455a079123a305e1e1072e03..15c47c586e477c9c36e7537d659c2a9c61788bec 100644 (file)
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -377,6 +377,7 @@ Therefore, you need to have `(display-time)' in your .emacs file."
     (insert-string appt-msg)
     (shrink-window-if-larger-than-buffer (get-buffer-window appt-disp-buf t))
     (set-buffer-modified-p nil)
+    (raise-frame (selected-frame))
     (select-window this-window)
     (if appt-audible
        (beep 1))))